
Menu subclass: #EmptyMenu
  instanceVariableNames: ''
  classVariableNames: ''
  poolDictionaries: '' !

!EmptyMenu class methods ! !


!EmptyMenu methods !

popUpAt: aPoint
        "An empty menu does nothing -- answer nil."
    ^nil.!

popUpAt: aPoint for: anObject
        "An empty menu does nothing -- answer nil."
    ^nil.! !
